home *** CD-ROM | disk | FTP | other *** search
/ PC World Interactive 2 / PC World Interactive 2 - Eylül 1997.iso / shar / graf / il7try.exe / IL7TRY / ARCHIVE.Z / AIRes.dll / TEXT / 1023 < prev    next >
Text File  |  1997-05-19  |  38KB  |  2,091 lines
  1. %%BeginResource: procset AGM_Gradient_Sep 1.0 0
  2. %%Title: (AGM Gradient Procset)
  3. %%Version: 1.0 0
  4. %%CreationDate: (4/26/96) ()
  5. %%Copyright: ((C) 1987-1996 Adobe Systems Incorporated All Rights Reserved)
  6. userdict /defaultpacking currentpacking put true setpacking
  7. userdict /AGM_Gradient_Sep 5 dict dup begin put
  8. /AGM_Gradient_Sep_private 100 dict def
  9. /initialize{
  10.     AGM_Gradient_Sep begin
  11.     AGM_Gradient_Sep_private begin
  12.     _compositeJob{
  13.         initializeSinglePassSeps
  14.     }{
  15.         initializeMultiPassSeps
  16.     }ifelse
  17.     initializeSeps
  18.     AGM_Gradient_private begin
  19.         /_fillSD newSpotDict def
  20.         /_rampSD newSpotDict def
  21.         /_nCustomColorSD nd
  22.  end
  23.     AGM_Gradient_Sep_private 
  24.     {
  25.         dup xcheck 1 index type /arraytype eq and
  26.         {
  27.             bind
  28.         }if
  29.         pop pop
  30.     }forall
  31.     AGM_Gradient_Sep
  32.     {
  33.         dup xcheck 1 index type /arraytype eq and
  34.         {
  35.             bind
  36.         }if
  37.         pop pop
  38.     }forall
  39.  end
  40.     
  41.     currentdict readonly pop    
  42.  end
  43. }def
  44. /terminate{
  45.     currentdict AGM_Gradient_Sep eq{
  46.      end
  47.     }if
  48. }def
  49. AGM_Gradient_Sep_private begin
  50. /initializeSeps{
  51.     _noImage not _level2PS not and{
  52.         /linealFill{
  53.             currentoverprint{
  54.                 0 0 1 1 rectfill
  55.             }{
  56.                 mySave
  57.                 8 setImageParms
  58.                 _color{
  59.                     _nCustomColorSD begin
  60.                         cyan magenta yellow black
  61.     
  62.                         _spotColor{
  63.                             spot1/tintImage spot1/tintValue get 1 exch sub makeByte8 put
  64.                             spot2/tintImage spot2/tintValue get 1 exch sub makeByte8 put
  65.                         }if
  66.                  end
  67.     
  68.                     4{
  69.                         makeByte8 4 1 roll
  70.                     }repeat
  71.                     true 4 _nCustomColorSD ncolorimage
  72.                 }{
  73.                     _nCustomColorSD/black get 1 exch sub makeByte8 
  74.                     _nCustomColorSD bwImage
  75.                 }ifelse
  76.                 myRestore
  77.             }ifelse
  78.         }def
  79.     }if
  80.     /_whiteBytes 1 makeByte8 pt
  81.      /knockOut{
  82.         _noImage _level2PS or currentoverprint or{
  83.             gsave
  84.             false setoverprint
  85.             1 setgray 
  86.             0 0 1 1 rectfill
  87.             grestore
  88.         }{
  89.             8 setImageParms _whiteBytes /_image load 5 execImage
  90.         }ifelse
  91.     }def
  92.     /newSpotDict{
  93.         11 dict dup begin
  94.             /nSpots 2 def
  95.             /spot1 7 dict def
  96.             /spot2 7 dict def
  97.      end
  98.     }def
  99.     /initSpotData
  100.     {
  101.      begin
  102.             /name nd
  103.             /tintImage nd
  104.             /tintValue nd
  105.             /spot_C nd
  106.             /spot_M nd
  107.             /spot_Y nd
  108.             /spot_K nd
  109.      end
  110.     }def
  111.     /initSpotDict{
  112.      begin
  113.             /cyanInk nd
  114.             /magentaInk nd
  115.             /yellowInk nd
  116.             /blackInk nd
  117.             /cyan nd
  118.             /magenta nd
  119.             /yellow nd
  120.             /black nd
  121.             spot1 initSpotData
  122.             spot2 initSpotData
  123.      end
  124.     }def
  125.     /copySpotDict{
  126.         /_dst xp
  127.      begin
  128.             cyanInk magentaInk yellowInk blackInk
  129.             cyan magenta yellow black
  130.             spot1 spot2
  131.      end
  132.         _dst begin
  133.             /spot1 spot1 maxlength dict def
  134.             /spot2 spot2 maxlength dict def
  135.             spot2 copy pop
  136.             spot1 copy pop
  137.             /black xd
  138.             /yellow xd
  139.             /magenta xd
  140.             /cyan xd
  141.             /blackInk xd
  142.             /yellowInk xd
  143.             /magentaInk xd
  144.             /cyanInk xd
  145.      end
  146.     }def
  147.     /setCustomColor
  148.     {
  149.         1 index /Black eq{
  150.             6 1 roll 5 npop
  151.             1 exch sub
  152.             setgray
  153.         }{
  154.             6 1 roll _ccAry1 astore exch
  155.             dup null eq{
  156.                 pop 0
  157.             }if
  158.             setcustomcolor
  159.         }ifelse
  160.     }def
  161.     /setCStop{
  162.         /_colorStyle exch pt
  163.         
  164.         _colorStyle 0 eq{
  165.             0 0 0
  166.             4 -1 roll
  167.             1 exch sub
  168.             _spotColor{
  169.                 /_colorStyle 3 pt
  170.                 /Black
  171.                 1 index
  172.                 1 exch sub
  173.             }if
  174.         }if
  175.         _colorStyle 2 eq{
  176.             3 npop
  177.         }if
  178.         _rampSD _fillSD copySpotDict
  179.         
  180.         _colorStyle 4 eq{ 
  181.             pop
  182.             9 2 roll 3 npop 6 -2 roll
  183.         } if
  184.         
  185.         _colorStyle 3 eq _colorStyle 4 eq or{     
  186.                 
  187.             _fillSD begin
  188.                 /_spot1 spot1 pt
  189.                 /_spot2 spot2 pt
  190.          end
  191.             
  192.             exch dup _spot1/name get eq{
  193.                 _spot1 _spot2
  194.             }{
  195.                 _spot2 _spot1
  196.             }ifelse
  197.          begin
  198.              begin
  199.                     /name xd
  200.                     1 exch sub /tintValue xd
  201.                     4{
  202.                         tintValue mul 4 1 roll
  203.                     }repeat
  204.                     _spotColor not{
  205.                         /tintValue null def
  206.                     }if
  207.              end
  208.                 /tintValue 0 def
  209.          end
  210.         }if
  211.         _fillSD nsetcustomcolor
  212.     }def
  213.     /renderCMYK{
  214.         spot1/name get null eq
  215.         spot2/name get null eq and
  216.         dup not{
  217.             pop
  218.             spot1 spotConverted
  219.         }if
  220.         dup not{
  221.             pop
  222.             spot2 spotConverted
  223.         }if
  224.     }def
  225.     /currentInk{
  226.         true
  227.         _inRipSep{
  228.             currentcolorspace 0 get
  229.             dup /DeviceGray eq
  230.             1 index /DeviceCMYK eq or{
  231.                 pop
  232.                 currentcmykcolor add add add 0 eq{
  233.                     pop false
  234.                 }if
  235.             }{
  236.                 /Separation eq{
  237.                     currentcolor 0 eq{
  238.                         pop false
  239.                     }if
  240.                 }if
  241.             }ifelse
  242.         }{
  243.             currentgray 1 eq{
  244.                 pop false
  245.             }if
  246.         }ifelse
  247.     }def
  248.     /currentInkN{
  249.     
  250.         _nCustomColorSD begin
  251.             /_spot1 spot1 pt
  252.             /_spot2 spot2 pt
  253.             renderCMYK
  254.      end
  255.         {
  256.             currentInk
  257.         }{
  258.             gsave
  259.             _spot1 begin
  260.                 name null ne{
  261.                     spot_C spot_M spot_Y spot_K name tintValue setCustomColor
  262.                     currentInk
  263.                 }{
  264.                     false
  265.                 }ifelse
  266.          end
  267.             _spot2 begin
  268.                 name null ne{
  269.                     spot_C spot_M spot_Y spot_K name tintValue setCustomColor
  270.                     currentInk
  271.                 }{
  272.                     false
  273.                 }ifelse
  274.          end
  275.             grestore
  276.             
  277.             or
  278.         } ifelse
  279.     }def
  280.     /fill_ /fill load def
  281.     /fillOvp{
  282.         currentoverprint{
  283.             _inRipSep{
  284.                 currentcolorspace 0 get
  285.                 dup /DeviceGray eq
  286.                 1 index /DeviceCMYK eq or{
  287.                     pop
  288.                     currentcmykcolor add add add 0 eq{
  289.                         newpath
  290.                     }if
  291.                 }{
  292.                     /Separation eq{
  293.                         currentcolor 0 eq{
  294.                             newpath
  295.                         }if
  296.                     }if
  297.                 }ifelse
  298.             }{
  299.                 currentgray 1 eq{
  300.                     newpath
  301.                 }if
  302.             }ifelse
  303.         }if
  304.         fill_
  305.     }def
  306.     /fill{
  307.         _nCustomColorSD begin
  308.             /_spot1 spot1 pt
  309.             /_spot2 spot2 pt
  310.             renderCMYK
  311.      end
  312.         
  313.         {
  314.             fillOvp
  315.         }{
  316.             _spot1 begin
  317.                 gsave
  318.                 name null ne{
  319.                     spot_C spot_M spot_Y spot_K name tintValue setCustomColor
  320.                 }{
  321.                     1 setgray
  322.                 }ifelse
  323.                 fillOvp 
  324.                 grestore
  325.          end
  326.             _spot2 begin
  327.                 name null ne{
  328.                     gsave
  329.                     true setoverprint
  330.                     spot_C spot_M spot_Y spot_K name tintValue setCustomColor
  331.                     fillOvp
  332.                     grestore
  333.                 }if
  334.          end
  335.             newpath
  336.         }ifelse
  337.     }def
  338.     /expandSpot{
  339.         _spotColor{
  340.             /_len xp
  341.             _rampSD begin
  342.                 spot1 begin
  343.                     tintImage null ne{
  344.                         tintImage _len expandOne /tintImage xd
  345.                     }if
  346.              end
  347.                 spot2 begin
  348.                     tintImage null ne{
  349.                         tintImage _len expandOne /tintImage xd
  350.                     }if
  351.              end
  352.          end
  353.         }{
  354.             pop
  355.         }ifelse
  356.     }def
  357.     /rampImage{
  358.         _enabledSmoothShade{
  359.             fillRamp
  360.         }{
  361.             currentoverprint{
  362.                 rectImage
  363.             }{
  364.                 _color{
  365.                     _rampSD begin
  366.                         /cyanInk _cyanData 0 ne def
  367.                         /magentaInk _magentaData 0 ne def
  368.                         /yellowInk _yellowData 0 ne def
  369.                         /blackInk _blackData 0 ne def
  370.                  end
  371.                     
  372.                     _nSamples setImageParms
  373.                     _nSamples expandSpot
  374.                     _cyanData _magentaData _yellowData _blackData _nSamples 4 expandColor
  375.                     true 4 _rampSD ncolorimage
  376.                 }{
  377.                     _rampSD begin
  378.                         /cyanInk false def
  379.                         /magentaInk false def
  380.                         /yellowInk false def
  381.                         /blackInk true def
  382.                  end
  383.                     _nSamples setImageParms 
  384.                     _blackData _rampSD bwImage
  385.                 }ifelse
  386.             }ifelse
  387.         }ifelse
  388.     }def
  389.     /nsetcustomcolor where{
  390.         pop
  391.     }{
  392.         /nsetcustomcolor
  393.         {
  394.             /_nCustomColorSD xp
  395.             _nCustomColorSD begin
  396.                 4 copy
  397.                 /black xd
  398.                 /yellow xd
  399.                 /magenta xd
  400.                 /cyan xd
  401.                 4 copy
  402.                 0 ne /blackInk xd
  403.                 0 ne /yellowInk xd
  404.                 0 ne /magentaInk xd
  405.                 0 ne /cyanInk xd
  406.          end
  407.             setcmykcolor
  408.         }def
  409.     }ifelse
  410.     /nsetcustomcolorend where{
  411.         pop
  412.     }{
  413.         /nsetcustomcolorend
  414.         {
  415.             /_nCustomColorSD null pt
  416.         }def
  417.     }ifelse
  418.     /getRampColorSpace{
  419.         
  420.         /_renderCMYK _rampSD begin renderCMYK end pt
  421.         
  422.         _renderCMYK not{
  423.             _rampSD begin
  424.                 [/DeviceN 
  425.                     [
  426.                     spot1 begin
  427.                         name null ne tintImage null ne and{
  428.                             name
  429.                         }if
  430.                  end
  431.                     spot2 begin
  432.                         name null ne tintImage null ne and{
  433.                             name
  434.                         }if
  435.                  end
  436.                     ] /DeviceCMYK {}
  437.                 ] setcolorspace
  438.          end
  439.             /_nColorSpace currentcolorspace pt
  440.         }if
  441.         
  442.         _nSamples 1 gt{ 
  443.             /_ndx 0 pt
  444.             [blendColor] cvx exec
  445.         }if
  446.         _renderCMYK{
  447.             /_C0 [currentcolor] pt
  448.             /_C0_Space currentcolorspace pt
  449.         }{
  450.             /_C0 [
  451.                 _nCustomColorSD begin
  452.                     spot1 begin 
  453.                         name null ne{
  454.                             tintValue
  455.                         }if
  456.                  end
  457.                     spot2 begin 
  458.                         name null ne{
  459.                             tintValue
  460.                         }if
  461.                  end
  462.              end
  463.             ] pt
  464.             /_C0_Space _nColorSpace pt
  465.         }ifelse
  466.         
  467.         _nSamples 1 gt{ 
  468.             /_ndx _nSamples 1 sub pt
  469.             [blendColor] cvx exec
  470.         }if
  471.         _renderCMYK{
  472.             /_C1 [currentcolor] pt
  473.             /_C1_Space currentcolorspace pt
  474.         }{
  475.             /_C1 [
  476.                 _nCustomColorSD begin
  477.                     spot1 begin 
  478.                         name null ne{
  479.                             tintValue
  480.                         }if
  481.                  end
  482.                     spot2 begin 
  483.                         name null ne{
  484.                             tintValue
  485.                         }if
  486.                  end
  487.              end
  488.             ] pt
  489.             /_C1_Space _nColorSpace pt
  490.         }ifelse
  491.         
  492.         /_rampColorSpace _C0_Space pt
  493.         _spotColor{
  494.             nsetcustomcolorend
  495.         }if
  496.     }def
  497. }def
  498. /initializeSinglePassSeps{
  499.     /_decodeNorm    [0 1] pt
  500.     /_decodeInvert     [1 0] pt
  501.     /spotConverted
  502.     {
  503.      begin
  504.             name null eq{
  505.                 false
  506.             }{
  507.                 tintValue null eq tintImage null eq and{
  508.                     true
  509.                 }{
  510.                     false
  511.                     currentpagedevice/SeparationOrder get{name eq or}forall
  512.                     not
  513.                 }ifelse
  514.             }ifelse
  515.      end
  516.     }def
  517.     /dictImage
  518.     {
  519.         20 dict dup begin
  520.             /Dict xd
  521.             /Decode xd
  522.             /DataSource xd
  523.             /ImageMatrix xd
  524.             /BitsPerComponent xd
  525.             /Height xd
  526.             /Width xd
  527.             /ImageType 1 def
  528.             Dict
  529.      end
  530.         /_image load 1 execImage
  531.     }def
  532.     /bwImage{
  533.      begin
  534.             gsave
  535.             currentoverprint{
  536.                 blackInk{
  537.                     [/Separation /Black /DeviceGray{}] setcolorspace
  538.                     _decodeInvert dictImage
  539.                 }{
  540.                     5 npop
  541.                 }ifelse
  542.             }{
  543.                 /DeviceGray setcolorspace
  544.                 _decodeNorm dictImage
  545.             }ifelse
  546.             grestore
  547.      end
  548.     }def
  549.     /ncolorimage where{
  550.         pop
  551.     }{
  552.         /ncolorimage{
  553.          begin
  554.                 renderCMYK{
  555.                     cyanInk 
  556.                     magentaInk and
  557.                     yellowInk and
  558.                     blackInk and
  559.                     not
  560.                     currentoverprint 
  561.                     and{    
  562.                         pop pop
  563.                         gsave
  564.                         cyanInk{
  565.                             8 copy
  566.                             [/Separation /Cyan /DeviceGray{}] setcolorspace
  567.                             3 npop
  568.                             _decodeNorm dictImage
  569.                         }if
  570.                         magentaInk{
  571.                             8 copy
  572.                             [/Separation /Magenta /DeviceGray{}] setcolorspace
  573.                             4 -1 roll
  574.                             3 npop
  575.                             _decodeNorm dictImage
  576.                         }if
  577.                         yellowInk{
  578.                             8 copy
  579.                             [/Separation /Yellow /DeviceGray{}] setcolorspace
  580.                             4 -2 roll
  581.                             3 npop
  582.                             _decodeNorm dictImage
  583.                         }if
  584.                         blackInk{
  585.                             4 -3 roll
  586.                             [/Separation /Black /DeviceGray{}] setcolorspace
  587.                             3 npop
  588.                             _decodeNorm dictImage
  589.                         }{
  590.                             8 npop
  591.                         }ifelse
  592.                         grestore
  593.                     }{
  594.                         /_colorimage load 10 execImage
  595.                     }ifelse
  596.                 }{
  597.                     6 npop
  598.                     gsave
  599.                     spot1 begin
  600.                         name null ne tintImage null ne and{
  601.                             [/Separation name /DeviceGray{}] setcolorspace
  602.                             4 copy
  603.                             tintImage 
  604.                             name /Black eq{
  605.                                 _decodeNorm
  606.                             }{
  607.                                 _decodeInvert
  608.                             }ifelse 
  609.                             dictImage
  610.                         }{
  611.                             1 setgray fill
  612.                         }ifelse
  613.                  end
  614.                     spot2 begin
  615.                         true setoverprint
  616.                         name null ne tintImage null ne and{
  617.                             [/Separation name /DeviceGray{}] setcolorspace
  618.                             tintImage 
  619.                             name /Black eq{
  620.                                 _decodeNorm
  621.                             }{
  622.                                 _decodeInvert
  623.                             }ifelse 
  624.                             dictImage
  625.                         }{
  626.                             4 npop
  627.                             1 setgray fill
  628.                         }ifelse
  629.                  end
  630.                     grestore
  631.                 }ifelse
  632.          end
  633.         }def
  634.     }ifelse
  635. }def
  636. /initializeMultiPassSeps{
  637.     /_isCMYKSep
  638.         _cyanPlate _magentaPlate or _yellowPlate or _blackPlate or
  639.     pt
  640.     /invertXfer{
  641.         [
  642.         {
  643.             1 exch sub
  644.         }/exec load systemdict /currenttransfer get exec /exec load
  645.         ] cvx systemdict /settransfer get exec
  646.     }def
  647.     /ccThrough{
  648.         gsave
  649.         1 setCustomColor
  650.         currentcmykcolor
  651.         grestore
  652.         add add add 0 ne
  653.     }def
  654.     /spotConverted
  655.     {
  656.      begin
  657.             _isCMYKSep not{
  658.                 false
  659.             }{
  660.                 name null eq{
  661.                     false
  662.                 }{
  663.                     tintValue null eq tintImage null eq and{
  664.                         true
  665.                     }{
  666.                         spot_C spot_M spot_Y spot_K name ccThrough
  667.                     }ifelse
  668.                 }ifelse
  669.             }ifelse
  670.      end
  671.     }def
  672.     /spotChannel
  673.     {
  674.         _isCMYKSep{
  675.             pop false
  676.         }{
  677.             /_spotDict xp
  678.                 _spotDict/name get null eq{
  679.                     false
  680.                 }{
  681.                     _spotDict/spot_C get
  682.                     _spotDict/spot_M get
  683.                     _spotDict/spot_Y get
  684.                     _spotDict/spot_K get
  685.                     _spotDict/name get
  686.                     ccThrough 
  687.                 }ifelse
  688.         }ifelse
  689.     }def
  690.     /getChannelData
  691.     {
  692.         _isCMYKSep dup{
  693.             pop renderCMYK
  694.         }if
  695.         {
  696.             _blackPlate{
  697.                 4 1 roll 3 npop blackInk
  698.             }{
  699.                 _yellowPlate{
  700.                     4 2 roll 3 npop yellowInk
  701.                 }{
  702.                     _magentaPlate{
  703.                         4 3 roll 3 npop magentaInk
  704.                     }{
  705.                         3 npop cyanInk
  706.                     }ifelse
  707.                 }ifelse
  708.             }ifelse
  709.             {
  710.                 true /nonZeroData
  711.             }{
  712.                 true /zeroData
  713.             }ifelse
  714.         }{
  715.             4 npop
  716.             spot1/name get null ne 
  717.             spot1 spotChannel and{
  718.                 spot1/tintImage get dup null ne{
  719.                     false /nonZeroData
  720.                 }{
  721.                     pop false /noData
  722.                 }ifelse
  723.             }{
  724.                 spot2/name get null ne 
  725.                 spot2 spotChannel and{
  726.                     spot2/tintImage get dup null ne{
  727.                         false /nonZeroData
  728.                     }{
  729.                         pop false /noData
  730.                     }ifelse
  731.                 }{
  732.                     false /noData
  733.                 }ifelse
  734.             }ifelse
  735.         }ifelse
  736.     }def
  737.     /renderChannelData
  738.     {
  739.         /_tmp xp
  740.         _tmp /nonZeroData ne currentoverprint and{
  741.             pop
  742.             _tmp /zeroData eq{pop}if
  743.             4 npop
  744.         }{
  745.             _tmp /nonZeroData eq{
  746.                 {
  747.                     invertXfer
  748.                 }if
  749.                     systemdict/image
  750.                 get 5 execImage
  751.             }{
  752.                 pop
  753.                 _tmp /zeroData eq{pop}if
  754.                 4 npop
  755.                 knockOut
  756.             }ifelse
  757.         }ifelse
  758.     }def
  759.     /bwImage{
  760.      begin
  761.             gsave
  762.             dup dup dup
  763.             getChannelData
  764.             exch pop false exch
  765.             renderChannelData
  766.             grestore
  767.      end
  768.     }def
  769.     /ncolorimage{
  770.      begin
  771.             pop pop
  772.             gsave
  773.             spot2/name get null ne spot2 spotChannel and{
  774.                 true setoverprint
  775.             }if
  776.             getChannelData 
  777.             renderChannelData
  778.             grestore
  779.      end
  780.     }def
  781. }def
  782. end
  783. end
  784. defaultpacking setpacking
  785. %%EndResource
  786. %%BeginResource: procset AGM_Gradient 1.0 0
  787. %%Title: (AGM Gradient Procset)
  788. %%Version: 1.0 0
  789. %%CreationDate: (4/26/96) ()
  790. %%Copyright: ((C) 1987-1996 Adobe Systems Incorporated All Rights Reserved)
  791. userdict /defaultpacking currentpacking put true setpacking
  792. userdict /AGM_Gradient 20 dict dup begin put
  793. /AGM_Gradient_private 200 dict def
  794. /initialize
  795. {
  796.     AGM_Gradient begin
  797.     AGM_Gradient_private begin
  798.     initializeVars
  799.     
  800.     /bd systemdict/mark get def
  801.     /ed
  802.         _level2PS 
  803.         {
  804.             (>>)
  805.         }{
  806.             (counttomark 2 idiv dup dict begin {def} repeat pop currentdict end)
  807.         } ifelse
  808.     cvx def
  809.     
  810.     _level2PS{
  811.         initializeLev2
  812.     }{
  813.         initializeLev1
  814.     }ifelse
  815.     
  816.     queryDevice
  817.     
  818.     initializeRectFill
  819.     initializeShading
  820.     initializeOps
  821.     _producingSeps{
  822.         AGM_Gradient_Sep/initialize get exec
  823.     }{
  824.         initializeComposite
  825.     }ifelse
  826.     _illustrator{
  827.         /f{}def
  828.         /F{}def
  829.         /s{}def
  830.         /S{}def
  831.         /b{}def
  832.         /B{}def
  833.     }if
  834.     /image where{
  835.         /image get /_image xd
  836.     }if
  837.     /colorimage where{
  838.         /colorimage get /_colorimage xd
  839.     }if
  840.     AGM_Gradient_private
  841.     {
  842.         dup xcheck 1 index type /arraytype eq and
  843.         {
  844.             bind
  845.         }if
  846.         pop pop
  847.     }forall
  848.     AGM_Gradient
  849.     {
  850.         dup xcheck 1 index type /arraytype eq and
  851.         {
  852.             bind
  853.         }if
  854.         pop pop
  855.     }forall
  856.  end
  857.     
  858.     currentdict readonly pop
  859.  end
  860. }def
  861. /initializeAI
  862. {
  863.     pop pop 
  864.     AGM_Gradient/AGM_Gradient_private get /_illustrator true put
  865.     AGM_Gradient/initialize get exec
  866.         AGM_Gradient begin
  867. }def
  868. /unload{
  869.     systemdict/languagelevel known{
  870.         systemdict/languagelevel get 2 ge{
  871.             userdict/AGM_Gradient_Sep 2 copy known{
  872.                 undef
  873.             }{
  874.                 pop pop
  875.             }ifelse
  876.             userdict/AGM_Gradient 2 copy known{
  877.                 undef
  878.             }{
  879.                 pop pop
  880.             }ifelse
  881.         }if
  882.     }if
  883. }def
  884. /terminate{
  885.     currentdict AGM_Gradient eq{
  886.      end
  887.     }if
  888. }def
  889.  
  890. AGM_Gradient_private begin
  891. /initializeVars{
  892.     /_d255 256 array def
  893.     0 1 255{
  894.         _d255 exch dup 255 div put
  895.     }bind for
  896.     /_d255- 256 array def
  897.     0 1 255{
  898.         _d255- exch 1 _d255 2 index get sub put
  899.     }bind for
  900.     /_sSave nd
  901.     /_dUserSpace matrix defaultmatrix def
  902.     /_bUMatrix matrix def
  903.     /_imageMatrix matrix def
  904.     /_saveMatrix matrix def
  905.     /_xm matrix def
  906.     /_ccAry1 5 array def
  907.     /_level2PS 
  908.         systemdict/languagelevel known dup{
  909.             pop systemdict/languagelevel get 2 ge
  910.         }if
  911.     def
  912.     /_level3PS
  913.         _level2PS systemdict/shfill known and
  914.     def
  915.     currentdict /_illustrator known not{
  916.         /_illustrator false def
  917.     }if
  918.     
  919. }def
  920. /initializeOps
  921. {
  922.     AGM_Gradient begin
  923.     currentdict/Bc known not{
  924.         /Bc{
  925.         
  926.             _renderFlag 2 eq _enabledSmoothShade or{
  927.                 6 npop
  928.             }{
  929.                 pushBSpace
  930.                 _rampIndex 0 eq{
  931.                     pop pop
  932.                     setCStop
  933.                 }if
  934.                 linealFill
  935.                 popBSpace
  936.             }ifelse
  937.         
  938.         }def
  939.     }if
  940.     
  941.     currentdict/Bg known not{
  942.         /Bg{
  943.             10 npop
  944.             /_gradName xp
  945.             /_renderFlag xp
  946.             /_enabledSmoothShade false pt
  947.         
  948.             _renderFlag 2 ne{
  949.         
  950.                 _illustrator{
  951.                     _of setoverprint
  952.                 }if
  953.         
  954.                 /_enabledSmoothShade 
  955.                     _level3PS{
  956.                         _usingSmoothShade
  957.                         _producingSeps not
  958.                         _inRipSep currentoverprint not and or and
  959.                     }{
  960.                         false
  961.                     }ifelse
  962.                 pt
  963.                 
  964.                 _illustrator _eo and _renderFlag 3 eq or{
  965.                     eoclip
  966.                 }{
  967.                     clip
  968.                 }ifelse
  969.         
  970.                 _gradNames _gradName 2 copy known{
  971.                     get
  972.                     mark exch aload pop
  973.                     /_gradType xp
  974.                     1 sub dup /_rampIndex xp
  975.                     /_maxRampIndex xp
  976.                     mark exch aload pop
  977.                     0 0
  978.                 }if
  979.                 pop pop
  980.                 getRampData
  981.             }{
  982.                 mark mark
  983.             }ifelse
  984.         }def
  985.     }if
  986.     
  987.     currentdict/Bm known not{
  988.         /Bm{
  989.             _renderFlag 2 ne{
  990.                 _gradType 0 eq{
  991.                     linealRamp
  992.                 }{
  993.                     radialGrad
  994.                 }ifelse
  995.             }{
  996.                 6 npop
  997.             }ifelse
  998.         }def
  999.     }if
  1000.     
  1001.     currentdict/Bh known not{
  1002.         /Bh{
  1003.             2 npop
  1004.             /_yHi xp
  1005.             /_xHi xp
  1006.             /_radHilite _xHi 0 ne _yHi 0 ne or pt
  1007.         }def
  1008.     }if
  1009.     
  1010.     currentdict/Bn known not{
  1011.         /Bn{
  1012.             AGM_Gradient_private begin
  1013.                 dict /_gradNames xp
  1014.          end
  1015.         }def
  1016.     }if
  1017.     
  1018.     currentdict/Bd known not{
  1019.         /Bd{
  1020.             AGM_Gradient begin
  1021.             AGM_Gradient_private begin
  1022.                 /_nColorsBd xp
  1023.                 /_gradType xp
  1024.                 /_gradName xp
  1025.         }def
  1026.     }if
  1027.     
  1028.     currentdict/BD known not{
  1029.         /BD{
  1030.                 currentdict/_gradNames known not{
  1031.                     /_gradNames 20 dict def
  1032.                 }if
  1033.                 ] _nColorsBd _gradType
  1034.                 ]  _gradName exch /_gradNames xput
  1035.          end
  1036.          end
  1037.         }def
  1038.     }if
  1039.     
  1040.     currentdict/Bb known not{
  1041.         /Bb{
  1042.         
  1043.             AGM_Gradient/AGM_Gradient_private get /_illustrator get not{
  1044.                 AGM_Gradient begin
  1045.             }if
  1046.             AGM_Gradient_private begin
  1047.             _producingSeps{
  1048.                 AGM_Gradient_Sep/AGM_Gradient_Sep_private get begin
  1049.             }if
  1050.             mySave
  1051.         }def
  1052.     }if
  1053.     
  1054.     currentdict/BB known not{
  1055.         /BB{
  1056.         
  1057.             /_tmp xp
  1058.             cleartomark cleartomark
  1059.         
  1060.             _tmp dup
  1061.             _renderFlag
  1062.         
  1063.             myRestore
  1064.         
  1065.             _producingSeps{
  1066.              end
  1067.             }if
  1068.         
  1069.             _illustrator dup
  1070.          end
  1071.             not {
  1072.              end
  1073.             }if
  1074.         
  1075.             {
  1076.                 2 ne exch 0 gt and{
  1077.                     2 eq{
  1078.                         s
  1079.                     }{
  1080.                         S
  1081.                     }ifelse
  1082.                 }{
  1083.                     pop newpath
  1084.                 }ifelse
  1085.             }{
  1086.                 pop newpath
  1087.             }ifelse
  1088.         
  1089.         
  1090.         }def
  1091.     }if
  1092.     
  1093.     currentdict/Xm known not{
  1094.         /Xm{
  1095.             _xm astore pop
  1096.         }def
  1097.     }if
  1098.     
  1099.  end
  1100. }def
  1101. /queryDevice{
  1102.     /_inRipSep
  1103.         _level2PS{
  1104.             currentpagedevice/Separations 2 copy known{
  1105.                 get
  1106.             }{
  1107.                 pop pop false
  1108.             }ifelse
  1109.         }{
  1110.             false
  1111.         }ifelse
  1112.     def
  1113.     /_noImage /lv1Fix where{
  1114.         pop lv1Fix
  1115.     }{
  1116.         false
  1117.     }ifelse
  1118.     def
  1119.     /_useShells where{
  1120.         pop
  1121.     }{
  1122.         /_useShells false def
  1123.     }ifelse
  1124.     
  1125.     /_useSmoothShade where{
  1126.         pop
  1127.     }{
  1128.         /_useSmoothShade false def 
  1129.     }ifelse
  1130.     /_cyanPlate 1 0 0 0 testCMYKColorThrough def
  1131.     /_magentaPlate 0 1 0 0 testCMYKColorThrough def
  1132.     /_yellowPlate 0 0 1 0 testCMYKColorThrough def
  1133.     /_blackPlate 0 0 0 1 testCMYKColorThrough def
  1134.     /_compositeJob
  1135.         _cyanPlate _magentaPlate and _yellowPlate and _blackPlate and
  1136.     def
  1137.     /_compositeSpotDevice where{
  1138.         pop
  1139.     }{
  1140.         /_compositeSpotDevice _compositeJob not _inRipSep or{
  1141.             1
  1142.         }{
  1143.             0
  1144.         }ifelse
  1145.         def
  1146.     }ifelse
  1147.     /_producingSeps _compositeSpotDevice 0 ne def
  1148.     /_deviceDPI 72 0 matrix defaultmatrix dtransform dup mul exch dup mul add sqrt def
  1149.     /_dpiThreshold where{
  1150.         pop
  1151.     }{
  1152.         /_dpiThreshold 600 def
  1153.     }ifelse
  1154.     /_screenFreqThreshold where{
  1155.         pop
  1156.     }{
  1157.         /_screenFreqThreshold 150 def
  1158.     }ifelse
  1159.     /_contoneDevice where{
  1160.         pop
  1161.     }{
  1162.         /_contoneDevice false def
  1163.     }ifelse
  1164.     /_subSampleOK 
  1165.         _deviceDPI _dpiThreshold le 
  1166.         currentScreenFreq _screenFreqThreshold le and 
  1167.         _contoneDevice not and 
  1168.     def
  1169. }def
  1170. /initializeRectFill{
  1171.     /rectfill where dup{
  1172.         exch pop not _producingSeps or
  1173.     }{
  1174.         not
  1175.     }ifelse
  1176.     {
  1177.         /rectfill{
  1178.             gsave
  1179.             newpath
  1180.             4 2 roll moveto
  1181.             1 index 0 rlineto
  1182.             0 1 index rlineto
  1183.             1 index neg 0 rlineto
  1184.             pop pop
  1185.             closepath
  1186.             fill
  1187.             grestore
  1188.         }def
  1189.     }if
  1190. }def
  1191. /initializeLev1{
  1192.     /currentoverprint where{
  1193.         pop
  1194.     }{
  1195.         /currentoverprint {
  1196.             false
  1197.         }def
  1198.     }ifelse
  1199.     /currentScreenFreq{
  1200.         currentscreen pop pop
  1201.     }def
  1202.     /_byte 1 string def
  1203.     /colorimage where{
  1204.         pop
  1205.     }{
  1206.         /colorimage{
  1207.             pop pop
  1208.             /_blackTmp xp
  1209.             /_yellowTmp xp
  1210.             /_magentaTmp xp
  1211.             /_cyanTmp xp
  1212.             /_cnt 0 pt
  1213.             [
  1214.             _byte dup 0
  1215.             _cyanTmp 
  1216.                 /_cnt cvx /get cvx _d255 /exch cvx /get cvx .3 /mul cvx
  1217.             _magentaTmp
  1218.                 /_cnt cvx /get cvx _d255 /exch cvx /get cvx .59 /mul cvx
  1219.             _yellowTmp
  1220.                 /_cnt cvx /get cvx _d255 /exch cvx /get cvx .11 /mul cvx
  1221.             _blackTmp 
  1222.                 /_cnt cvx /get cvx _d255 /exch cvx /get cvx
  1223.             /add cvx /add cvx /add cvx 1 /exch cvx /sub cvx
  1224.             /dup cvx 0 /lt cvx{
  1225.                 pop 0
  1226.             }/if cvx
  1227.             /dup cvx 1 /gt cvx{
  1228.                 pop 1
  1229.             }/if cvx
  1230.             255 /mul cvx /cvi cvx
  1231.             256 /mod cvx
  1232.             /dup cvx 0 /lt cvx{
  1233.                 pop 0
  1234.             }/if cvx
  1235.             /put cvx
  1236.             /_cnt dup cvx 1 /add cvx /pt cvx
  1237.             ] cvx
  1238.             bind
  1239.             /_image load 5 execImage
  1240.         }def
  1241.     }ifelse
  1242. }def
  1243. /initializeLev2{
  1244.     /level2ScreenFreq{
  1245.      begin
  1246.         60
  1247.         HalftoneType 1 eq{
  1248.             pop Frequency
  1249.         }if
  1250.         HalftoneType 2 eq{
  1251.             pop GrayFrequency
  1252.         }if
  1253.         HalftoneType 5 eq{
  1254.             pop Default level2ScreenFreq
  1255.         }if
  1256.          end
  1257.     }def
  1258.     /currentScreenFreq{
  1259.         currenthalftone level2ScreenFreq
  1260.     }def
  1261. }def
  1262. /initializeShading{
  1263.     _useSmoothShade _level3PS and{
  1264.         /_usingSmoothShade true pt
  1265.         initializeLev3_Ops
  1266.     }{
  1267.         /_usingSmoothShade false pt
  1268.     }ifelse
  1269. }def
  1270. /initializeLev3_Ops
  1271. {
  1272.     /initShFill{
  1273.         /_index _gradType 0 eq {0}{_maxRampIndex 1 sub} ifelse pt
  1274.         /_rampFuncsArray _maxRampIndex array pt
  1275.         /_boundsArray _maxRampIndex 1 sub array pt
  1276.         /_encodeArray _maxRampIndex 2 mul array pt
  1277.         /_beginCoord _rampPoint pt
  1278.         /_colorSpace null pt
  1279.         /_firstFill _rampIndex _maxRampIndex eq pt
  1280.         /_lastFill false pt
  1281.     }def
  1282.     /linealShFill{
  1283.         popBSpace
  1284.         _xm aload pop pushBSpace
  1285.         
  1286.         /_size _index 1 add pt
  1287.         _size _maxRampIndex lt {
  1288.             /_rampFuncsArray _rampFuncsArray 0 _size getinterval pt
  1289.             /_boundsArray _boundsArray 0 _size 1 sub getinterval pt
  1290.             /_encodeArray _encodeArray 0 _size 2 mul getinterval pt
  1291.         }if
  1292.         
  1293.         bd
  1294.             /ShadingType 2
  1295.             /ColorSpace _colorSpace
  1296.             /Function 
  1297.                 bd
  1298.                     /FunctionType 3
  1299.                     /Domain [0 1]
  1300.                     /Functions _rampFuncsArray
  1301.                     /Bounds _boundsArray
  1302.                     /Encode _encodeArray
  1303.                 ed
  1304.             /Extend [_firstFill _lastFill]
  1305.             /Domain [0 1] 
  1306.             /Coords [_beginCoord 0 _endCoord 0]
  1307.         ed
  1308.         shfill
  1309.     }def
  1310.     
  1311.     /radialShFill{
  1312.         /_size _maxRampIndex _index sub pt
  1313.         _size _maxRampIndex lt {
  1314.             /_rampFuncsArray _rampFuncsArray _index _size getinterval pt
  1315.             /_boundsArray _boundsArray _index _size 1 sub getinterval pt
  1316.             /_encodeArray _encodeArray _index 2 mul _size 2 mul getinterval pt
  1317.         }if
  1318.         
  1319.         /_rampLen _beginCoord _endCoord sub pt
  1320.         bd
  1321.             /ShadingType 3
  1322.             /ColorSpace _colorSpace
  1323.             /Function 
  1324.                 bd
  1325.                     /FunctionType 3
  1326.                     /Domain [0 1]
  1327.                     /Functions _rampFuncsArray
  1328.                     /Bounds _boundsArray
  1329.                     /Encode _encodeArray
  1330.                 ed
  1331.             /Extend [_lastFill _firstFill]
  1332.             /Domain [0 1] 
  1333.             /Coords [_xHi _rampLen mul _yHi _rampLen mul _endCoord 0 0 _beginCoord] 
  1334.         ed
  1335.         shfill
  1336.         
  1337.         _radHilite{
  1338.             _xHi _rampLen mul _yHi _rampLen mul translate
  1339.         }if
  1340.     }def
  1341.     
  1342.     /fillRamp{
  1343.     
  1344.     
  1345.         /_invert _midPoint 0.5 lt pt
  1346.         _rampIndex _maxRampIndex eq {
  1347.             initShFill
  1348.         }if
  1349.         
  1350.         getRampColorSpace
  1351.         
  1352.         _colorSpace null eq{
  1353.             /_colorSpace _rampColorSpace pt
  1354.         }{
  1355.             _colorSpace _rampColorSpace ne{
  1356.                 /_index _index 1 
  1357.                 _gradType 0 eq{
  1358.                     sub pt
  1359.                     linealShFill
  1360.                 }{
  1361.                     add pt
  1362.                     radialShFill
  1363.                 }ifelse
  1364.                 initShFill
  1365.                 /_colorSpace _rampColorSpace pt
  1366.             } if
  1367.         }ifelse
  1368.         /_endCoord _endPoint pt    
  1369.         _rampFuncsArray _index
  1370.         bd
  1371.             /FunctionType 2
  1372.             /Domain [0 1]
  1373.             /N 0.5 log _invert{1 _midPoint sub}{_midPoint}ifelse log div
  1374.             _gradType 0 eq{
  1375.                 _invert{/C1}{/C0}ifelse _C0
  1376.                 _invert{/C0}{/C1}ifelse _C1
  1377.             }{
  1378.                 _invert{/C0}{/C1}ifelse _C1
  1379.                 _invert{/C1}{/C0}ifelse _C0
  1380.             }ifelse
  1381.         ed
  1382.         put
  1383.         
  1384.         _rampIndex 1 ne{
  1385.             _boundsArray _index _gradType 1 eq{1 sub}if _endCoord put
  1386.         } if
  1387.         
  1388.         0 1 _invert {exch}if
  1389.         _encodeArray _index 2 mul 1 add 3 -1 roll put
  1390.         _encodeArray _index 2 mul 3 -1 roll put
  1391.         _rampIndex 1 eq {
  1392.             /_lastFill true pt
  1393.             _gradType 0 eq{
  1394.                 linealShFill
  1395.             }{
  1396.                 radialShFill
  1397.             }ifelse
  1398.         }if
  1399.         /_index _index 1 
  1400.         _gradType 0 eq{
  1401.             add pt
  1402.         }{
  1403.             sub pt
  1404.         }ifelse
  1405.     }def
  1406. }def
  1407. /initializeComposite{
  1408.     /bwImage{
  1409.         pop /_image load 5 execImage 
  1410.     }def
  1411.     /rampImage{
  1412.         _enabledSmoothShade{
  1413.             fillRamp
  1414.         }{
  1415.             _color{
  1416.                 _nSamples setImageParms
  1417.     
  1418.                 
  1419.                 _rgbRamp{
  1420.                     _redData _greenData _blueData _nSamples 3 expandColor
  1421.                     true 3 null ncolorimage
  1422.                 }{
  1423.                     _cyanData _magentaData _yellowData _blackData _nSamples 4 expandColor
  1424.                     true 4 null ncolorimage
  1425.                 }ifelse
  1426.             }{
  1427.                 _nSamples setImageParms _blackData null bwImage
  1428.             }ifelse
  1429.         }ifelse
  1430.     }def
  1431.     /setCStop{
  1432.         /_colorStyle exch pt
  1433.         _colorStyle 0 eq{
  1434.             1 exch sub
  1435.             0 0 0
  1436.             4 -1 roll
  1437.         }if
  1438.         
  1439.         _colorStyle 2 eq{
  1440.             setrgbcolor 4 npop
  1441.         }if
  1442.         
  1443.         _colorStyle 3 eq{
  1444.             1 exch sub /_tmp xp
  1445.             pop
  1446.             4{
  1447.                 _tmp mul 4 1 roll
  1448.             }repeat
  1449.         }if
  1450.         
  1451.         _colorStyle 4 eq{
  1452.             3 -1 roll pop pop
  1453.             1 exch sub /_tmp xp
  1454.             3{
  1455.                 1 exch sub _tmp mul 1 exch sub 3 1 roll
  1456.             }repeat
  1457.             setrgbcolor 
  1458.             4 npop
  1459.         }if
  1460.         _colorStyle 2 ne _colorStyle 4 ne and{
  1461.             null nsetcustomcolor
  1462.         }if
  1463.     }def
  1464.     /nsetcustomcolor
  1465.     {
  1466.         pop setcmykcolor
  1467.     }def
  1468.     /nsetcustomcolorend
  1469.     {
  1470.     }def
  1471.     /ncolorimage{
  1472.         pop 
  1473.         /_colorimage load 10 execImage
  1474.     }def
  1475.     _noImage not _level2PS not and{
  1476.         /linealFill{
  1477.             8 setImageParms
  1478.             _color{
  1479.                 currentcmykcolor
  1480.                 4{
  1481.                     makeByte8 4 1 roll
  1482.                 }repeat
  1483.                 true 4 null ncolorimage
  1484.             }{
  1485.                 currentgray makeByte8 null bwImage
  1486.             }ifelse
  1487.         }def
  1488.     }if
  1489.     /getRampColorSpace{
  1490.         _nSamples 1 gt{ 
  1491.             /_ndx 0 pt
  1492.             [blendColor] cvx exec
  1493.         }if
  1494.         /_C0 [currentcolor] pt
  1495.         /_C0_Space currentcolorspace pt
  1496.         
  1497.         _nSamples 1 gt{ 
  1498.             /_ndx _nSamples 1 sub pt
  1499.             [blendColor] cvx exec
  1500.         }if
  1501.         /_C1 [currentcolor] pt
  1502.         /_C1_Space currentcolorspace pt
  1503.         
  1504.         /_rampColorSpace _C0_Space pt
  1505.         
  1506.         _spotColor{
  1507.             nsetcustomcolorend
  1508.         }if
  1509.     }def
  1510. }def
  1511. /npop{
  1512.     {pop}repeat
  1513. }def
  1514. /xd{
  1515.     exch def
  1516. }def
  1517. /nd{
  1518.     null def
  1519. }def
  1520. /pt{
  1521.     AGM_Gradient_private 3 1 roll put
  1522. }def
  1523. /xp{
  1524.     exch pt
  1525. }def
  1526. /xput{
  1527.     dup load dup length exch maxlength eq{
  1528.         dup dup load dup
  1529.         length 2 mul dict copy def
  1530.     }if
  1531.     load begin
  1532.         def
  1533.   end
  1534. }def
  1535. /mySave{
  1536.     save /_sSave xp
  1537. }def
  1538. /myRestore{
  1539.     _sSave type /savetype eq{
  1540.         _sSave restore
  1541.     }if
  1542. }def
  1543. /gMark{
  1544.     counttomark 2 add -1 roll
  1545. }def
  1546. /execImage{
  1547.     /_tmp xp
  1548.     {
  1549.         exec
  1550.     }stopped{
  1551.         $error /errorname get /undefinedresult ne{
  1552.             stop
  1553.         }{
  1554.             _tmp npop
  1555.         }ifelse
  1556.     }if
  1557. }def
  1558. /pushBSpace{
  1559.     newpath gsave
  1560.     _bUMatrix astore concat 
  1561. }def
  1562. /popBSpace{
  1563.     grestore
  1564. }def
  1565. /makeByte8{
  1566.     /_tmp 0 pt
  1567.     255 mul cvi
  1568.     8 string 8{
  1569.         dup _tmp 3 index put 
  1570.         /_tmp _tmp 1 add pt
  1571.     }repeat
  1572.     exch pop
  1573. }def
  1574. /setImageParms{
  1575.     1 8 2 index 0 0 1 0 0 _imageMatrix astore
  1576. }def
  1577. /linealFill{
  1578.     0 0 1 1 rectfill
  1579. }def
  1580. /testCMYKColorThrough{
  1581.     gsave
  1582.     setcmykcolor currentcmykcolor
  1583.     grestore
  1584.     add add add 0 ne
  1585. }def
  1586. /expandOne    {
  1587.     /_tmp xp
  1588.     dup type /stringtype ne{
  1589.         _tmp string
  1590.         exch
  1591.         dup 0 ne{
  1592.             255 mul cvi
  1593.             0 1 _tmp 1 sub{
  1594.                 3 copy
  1595.                 exch put pop
  1596.             }for
  1597.         }if
  1598.         pop
  1599.     }if
  1600. }def
  1601. /expandColor{
  1602.     /_channels xp
  1603.     /_len xp
  1604.     _channels{
  1605.         _len expandOne _channels 1 roll
  1606.     }repeat
  1607. }def
  1608. /blendColor{
  1609.     
  1610.     _color{
  1611.         _rgbRamp _producingSeps not and{
  1612.             _redData dup type /stringtype eq{
  1613.                 /_ndx cvx /get cvx _d255 /exch cvx /get cvx
  1614.             }if
  1615.             _greenData dup type /stringtype eq{
  1616.                 /_ndx cvx /get cvx _d255 /exch cvx /get cvx
  1617.             }if
  1618.             _blueData dup type /stringtype eq{
  1619.                 /_ndx cvx /get cvx _d255 /exch cvx /get cvx
  1620.             }if
  1621.             /setrgbcolor cvx
  1622.         }{
  1623.             _cyanData dup type /stringtype eq{
  1624.                 /_ndx cvx /get cvx _d255 /exch cvx /get cvx
  1625.             }if
  1626.             _magentaData dup type /stringtype eq{
  1627.                 /_ndx cvx /get cvx _d255 /exch cvx /get cvx
  1628.             }if
  1629.             _yellowData dup type /stringtype eq{
  1630.                 /_ndx cvx /get cvx _d255 /exch cvx /get cvx
  1631.             }if
  1632.             _blackData dup type /stringtype eq{
  1633.                 /_ndx cvx /get cvx _d255 /exch cvx /get cvx
  1634.             }if
  1635.     
  1636.             _spotColor{
  1637.                 _rampSD begin
  1638.                     /_rampSD cvx /begin cvx
  1639.     
  1640.                     spot1 begin
  1641.                         tintImage dup type /stringtype eq{
  1642.                             /_ndx cvx /get cvx _d255- /exch cvx /get cvx
  1643.                         }{
  1644.                             dup null ne{
  1645.                                 name type /nametype ne{
  1646.                                     1 exch sub
  1647.                                 }if
  1648.                             }if
  1649.                         }ifelse
  1650.                  end
  1651.                     /spot1 cvx /tintValue 3 -1 /roll cvx /put cvx
  1652.     
  1653.                     spot2 begin
  1654.                         tintImage dup type /stringtype eq{
  1655.                             /_ndx cvx /get cvx _d255- /exch cvx /get cvx
  1656.                         }{
  1657.                             dup null ne{
  1658.                                 name type /nametype ne{
  1659.                                     1 exch sub
  1660.                                 }if
  1661.                             }if
  1662.                         }ifelse
  1663.                  end
  1664.                     /spot2 cvx /tintValue 3 -1 /roll cvx /put cvx
  1665.                     /end cvx
  1666.              end
  1667.                 /_rampSD cvx
  1668.                 /nsetcustomcolor cvx
  1669.             }{
  1670.                 /setcmykcolor cvx
  1671.             }ifelse
  1672.         }ifelse
  1673.     }{
  1674.         _blackData dup type /stringtype eq{
  1675.             /_ndx cvx /get cvx _d255 /exch cvx /get cvx
  1676.         }if
  1677.         
  1678.         _enabledSmoothShade{
  1679.             1 /exch cvx /sub cvx 0 0 0 4 -1 /roll cvx /setcmykcolor cvx
  1680.         }{
  1681.              /setgray cvx
  1682.         }ifelse
  1683.     }ifelse
  1684. }def
  1685. /useRectImage{
  1686.     _subSampleOK _usingSmoothShade not and{
  1687.         {
  1688.             mark
  1689.             0 1 dtransform atan cvi 90 mod 0 eq
  1690.             1 0 dtransform atan cvi 90 mod 0 eq
  1691.         } stopped
  1692.         {
  1693.             cleartomark
  1694.             false
  1695.         }
  1696.         {
  1697.             and exch pop
  1698.         } ifelse
  1699.     }{
  1700.         false
  1701.     }ifelse
  1702. }def
  1703. /linealImage{
  1704.     _noImage{
  1705.         rectImage
  1706.     }{
  1707.         _producingSeps{
  1708.                 AGM_Gradient_Sep/AGM_Gradient_Sep_private get
  1709.                 /rampImage get exec
  1710.         }{
  1711.             useRectImage{
  1712.                 rectImage
  1713.             }{
  1714.                 rampImage
  1715.             }ifelse
  1716.         }ifelse
  1717.     }ifelse
  1718. }def
  1719. /linealRamp{
  1720.     pushBSpace
  1721.     _ramp{
  1722.         linealImage
  1723.     }{
  1724.         linealFill
  1725.     }ifelse
  1726.     popBSpace
  1727.     /_rampIndex _rampIndex 1 sub pt
  1728.     _rampIndex 0 gt{
  1729.         getRampData
  1730.     }if
  1731. }def
  1732. /radialGrad{
  1733.     /_firstShell true pt
  1734.     _enabledSmoothShade not{
  1735.         fill
  1736.     }if
  1737.     pushBSpace
  1738.     
  1739.     _radHilite{
  1740.         _xHi _yHi _bUMatrix idtransform /_yHi xp /_xHi xp
  1741.         _rampPoint 1 lt{
  1742.             1 _rampPoint sub dup _xHi mul exch _yHi mul translate
  1743.         }if
  1744.     }if
  1745.     _rampIndex{
  1746.             radialRamp
  1747.         /_rampIndex _rampIndex 1 sub pt
  1748.         _rampIndex 0 gt{
  1749.             getRampData
  1750.         }if
  1751.     }repeat
  1752.     
  1753.     popBSpace
  1754.     
  1755. }def
  1756. /getNSamples{
  1757.     0 exch
  1758.     {
  1759.         dup type /stringtype eq{
  1760.             length exch pop exit
  1761.         }if
  1762.         pop
  1763.     }forall
  1764.     dup 0 eq{
  1765.         pop 1
  1766.     }if
  1767. }def
  1768. /getRampData{
  1769.     /_rampType gMark pt
  1770.     /_color _rampType 0 gt pt
  1771.     /_ccRGB _rampType 5 eq _rampType 6 eq or pt
  1772.     /_rgbRamp _rampType 4 eq _ccRGB or pt
  1773.     /_ccProcess _rampType 2 eq _rampType 3 eq or pt
  1774.     _producingSeps{
  1775.         _rampSD initSpotDict
  1776.         /_spotColor _ccProcess _ccRGB or pt
  1777.     }{
  1778.         /_spotColor false pt
  1779.     }ifelse
  1780.     /_ramp true pt
  1781.     100 div /_rampPoint xp
  1782.     100 div /_midPoint xp
  1783.     
  1784.     dup /_colorStyle xp
  1785.     _colorStyle 0 eq{ 
  1786.         2
  1787.     }{
  1788.         _colorStyle 1 eq{ 
  1789.             5
  1790.         }{
  1791.             _colorStyle 2 eq{
  1792.                 8
  1793.             }{
  1794.                 _colorStyle 3 eq{
  1795.                     _producingSeps{
  1796.                         _rampSD /spot1 get begin
  1797.                             /name 3 index def
  1798.                             /spot_K 4 index def
  1799.                             /spot_Y 5 index def
  1800.                             /spot_M 6 index def
  1801.                             /spot_C 7 index def
  1802.                      end
  1803.                     }if
  1804.                     7
  1805.                 }{
  1806.                     _producingSeps{
  1807.                         _rampSD/spot1 get begin
  1808.                             /name 4 index def
  1809.                             /spot_K 8 index def
  1810.                             /spot_Y 9 index def
  1811.                             /spot_M 10 index def
  1812.                             /spot_C 11 index def
  1813.                      end
  1814.                     }if
  1815.                     11
  1816.                 } ifelse
  1817.             }ifelse
  1818.         }ifelse
  1819.     }ifelse
  1820.     /_tmp xp
  1821.     _tmp index 100 div /_endPoint xp
  1822.     
  1823.     _gradType 1 eq{
  1824.         _tmp 1 add index 100 div /_midPoint xp
  1825.     }if
  1826.     
  1827.     _producingSeps{
  1828.         _tmp 2 add index /_nextColorStyle xp
  1829.         _nextColorStyle 3 eq{
  1830.             /_tmp _tmp 4 add pt
  1831.             _tmp index dup
  1832.             _rampSD/spot1 get /name get ne{
  1833.                 _rampSD /spot2 get begin
  1834.                     /name xd
  1835.                     /spot_K _tmp 2 add index def
  1836.                     /spot_Y _tmp 3 add index def
  1837.                     /spot_M _tmp 4 add index def
  1838.                     /spot_C _tmp 5 add index def
  1839.              end
  1840.             }{
  1841.                 pop
  1842.             }ifelse
  1843.         }if
  1844.         _nextColorStyle 4 eq{
  1845.             /_tmp _tmp 5 add pt
  1846.             _tmp index dup
  1847.             _rampSD/spot1 get /name get ne{
  1848.                 _rampSD /spot2 get begin
  1849.                     /name xd
  1850.                     /spot_K _tmp 5 add index def
  1851.                     /spot_Y _tmp 6 add index def
  1852.                     /spot_M _tmp 7 add index def
  1853.                     /spot_C _tmp 8 add index def
  1854.              end
  1855.             }{
  1856.                 pop
  1857.             }ifelse
  1858.         }if
  1859.     }if
  1860.     _rampType 3 eq _rampType 6 eq or{
  1861.         /_tint2Data gMark pt
  1862.     }if
  1863.     _ccProcess _ccRGB or{
  1864.         /_tint1Data gMark pt
  1865.     }if
  1866.     _rgbRamp{
  1867.         /_blueData gMark pt
  1868.         /_greenData gMark pt
  1869.         /_redData gMark pt
  1870.     }if
  1871.     
  1872.     _producingSeps{
  1873.         _ccProcess _ccRGB or{
  1874.             _rampType 3 eq _rampType 6 eq or{
  1875.                 _rampSD /spot2 get begin
  1876.                     /tintImage _gradType 0 eq{
  1877.                         _tint2Data
  1878.                     }{
  1879.                         _tint1Data
  1880.                     }ifelse
  1881.                     def
  1882.                     name null eq{
  1883.                         /name /Black def
  1884.                     }if
  1885.              end
  1886.             }if
  1887.             _rampSD /spot1 get begin
  1888.                 /tintImage _gradType 0 eq _rampType 2 eq or _rampType 5 eq or{
  1889.                     _tint1Data
  1890.                 }{
  1891.                     _tint2Data
  1892.                 }ifelse
  1893.                 def
  1894.                 _rampType 2 eq _rampType 5 eq or{
  1895.                     name null eq{
  1896.                         /name _rampSD/spot2 get /name get def
  1897.                         /spot_C _rampSD/spot2 get /spot_C get def
  1898.                         /spot_M _rampSD/spot2 get /spot_M get def
  1899.                         /spot_Y _rampSD/spot2 get /spot_Y get def
  1900.                         /spot_K _rampSD/spot2 get /spot_K get def
  1901.                         _rampSD/spot2 get /name null put
  1902.                     }if
  1903.                 }{
  1904.                     name null eq{
  1905.                         /name /Black def
  1906.                     }if
  1907.                 }ifelse
  1908.          end
  1909.         }if
  1910.     }if
  1911.     /_blackData gMark pt
  1912.     _rampType 0 gt{
  1913.         counttomark 4 add -3 roll
  1914.         /_yellowData xp
  1915.         /_magentaData xp
  1916.         /_cyanData xp
  1917.     }if
  1918.     _ramp{
  1919.         /_nSamples
  1920.             [
  1921.             _rampType 0 eq {_blackData}if
  1922.             _rampType 1 eq {_cyanData _magentaData _yellowData _blackData}if
  1923.             _rampType 2 eq {_cyanData _magentaData _yellowData _blackData _tint1Data}if
  1924.             _rampType 3 eq {_cyanData _magentaData _yellowData _blackData _tint1Data _tint2Data}if
  1925.             _rampType 4 eq {_cyanData _magentaData _yellowData _blackData _redData _greenData _blueData}if
  1926.             _rampType 5 eq {_cyanData _magentaData _yellowData _blackData _redData _greenData _blueData _tint1Data}if
  1927.             _rampType 6 eq {_cyanData _magentaData _yellowData _blackData _redData _greenData _blueData _tint1Data _tint2Data}if
  1928.             ] getNSamples pt
  1929.         _enabledSmoothShade not {/_ramp _nSamples 1 gt pt} if
  1930.     } if
  1931.     
  1932.     setCStop
  1933. }def
  1934. /rectImage{
  1935.     gsave
  1936.     /_sInc 1 pt
  1937.     /_bInc 1 _nSamples div pt
  1938.     /_nSubSamples _nSamples pt
  1939.     
  1940.     _subSampleOK{
  1941.         /_uRampLen 1 0 dtransform _dUserSpace idtransform dup mul exch dup mul add sqrt pt
  1942.         /_pChange _uRampLen 0 eq{0}{_nSamples _uRampLen div}ifelse pt
  1943.         
  1944.         _pChange .5 gt dup /_optimize xp{
  1945.             /_nSubSamples _uRampLen 2 div round cvi dup 1 le{pop 2}if pt
  1946.             /_bInc 1 _nSubSamples div pt
  1947.             /_sInc _nSamples 1 sub _nSubSamples 1 sub div pt
  1948.         }if
  1949.     }if
  1950.     0
  1951.     _nSubSamples
  1952.     [
  1953.     /dup cvx
  1954.     _optimize {
  1955.         /round cvx /cvi cvx
  1956.     } if
  1957.     /_ndx /exch cvx /pt cvx
  1958.     blendColor
  1959.     0 0 _bInc 1 /rectfill cvx
  1960.     _bInc 0 /translate cvx
  1961.     _sInc /add cvx
  1962.     ] cvx
  1963.     bind
  1964.     repeat
  1965.     pop
  1966.     _spotColor{
  1967.         nsetcustomcolorend
  1968.     }if
  1969.     grestore
  1970. }def
  1971. /radialInit{
  1972.     /_nRadSamples _nSamples dup 0 eq{pop 1}if pt
  1973.     /_sInc -1 pt
  1974.     /_rampLen _rampPoint _endPoint sub pt
  1975.     /_bInc _rampLen _nSamples div neg pt
  1976.     /_optimize false pt
  1977.     _subSampleOK{
  1978.         /_uRampLen
  1979.             _rampLen 0 dtransform _dUserSpace idtransform dup mul exch dup mul add sqrt
  1980.             0 _rampLen dtransform _dUserSpace idtransform dup mul exch dup mul add sqrt
  1981.             2 copy lt{
  1982.                 exch
  1983.             }if pop
  1984.         pt
  1985.         /_pChange 
  1986.             _uRampLen 0 eq{
  1987.                 0
  1988.             }{
  1989.                 _nSamples _uRampLen div
  1990.             }ifelse
  1991.         pt
  1992.         _pChange .5 gt dup /_optimize xp{
  1993.             /_nRadSamples _uRampLen 2 div round cvi dup 1 le{pop 2}if pt
  1994.             /_bInc _rampLen _nRadSamples div neg pt
  1995.             /_sInc _nSamples 1 sub _nRadSamples 1 sub div neg pt
  1996.         }if
  1997.     }if
  1998.     _radHilite{
  1999.         /_xBCInc _xHi _rampLen mul _nRadSamples div pt
  2000.         /_yBCInc _yHi _rampLen mul _nRadSamples div pt
  2001.     }if
  2002. }def
  2003. /radialRamp{
  2004.     _enabledSmoothShade{
  2005.         fillRamp
  2006.     }{
  2007.         /_saveMatrix _saveMatrix currentmatrix def
  2008.         
  2009.         radialInit
  2010.     
  2011.         true
  2012.         _producingSeps{
  2013.             _nSamples 1 gt{ 
  2014.                 pop
  2015.                 /_ndx 0 pt
  2016.                 [blendColor] cvx exec
  2017.                 currentInkN
  2018.                 /_ndx _nSamples 1 sub pt
  2019.                 [blendColor] cvx exec
  2020.                 currentInkN
  2021.                 or
  2022.             }if
  2023.         }if
  2024.         {
  2025.             _rampPoint
  2026.         
  2027.             _nSamples 1 sub
  2028.         
  2029.             _nRadSamples 
  2030.             [
  2031.                 /dup cvx
  2032.         
  2033.                 _optimize{
  2034.                     /round cvx /cvi cvx
  2035.                 }if
  2036.         
  2037.                 /_ndx /exch cvx /pt cvx
  2038.                 
  2039.                 _useShells{
  2040.                     /_firstShell cvx{
  2041.                         /_firstShell false pt
  2042.                     }{
  2043.                         0 0 3 index 360 0 arcn fill
  2044.                     }/ifelse cvx
  2045.                 }if
  2046.         
  2047.                 blendColor
  2048.         
  2049.                 _useShells{
  2050.                     0 0 3 /index cvx 0 360 /arc cvx 
  2051.                 }{
  2052.                     0 0 3 /index cvx 0 360 /arc cvx /fill cvx
  2053.                 }ifelse
  2054.         
  2055.                 /exch cvx _bInc /add cvx /exch cvx
  2056.         
  2057.                 _sInc /add cvx
  2058.         
  2059.                 _radHilite{
  2060.                     _xBCInc _yBCInc /translate cvx
  2061.                 }if
  2062.             ] cvx bind
  2063.             repeat
  2064.         
  2065.             pop pop
  2066.         }{
  2067.             _useShells{
  2068.                 0 0 _rampPoint 360 0 arcn fill
  2069.             }if
  2070.         }ifelse
  2071.     
  2072.         _saveMatrix setmatrix
  2073.         
  2074.         _radHilite{
  2075.             _xHi _rampLen mul _yHi _rampLen mul translate
  2076.         }if
  2077.         
  2078.         _useShells _rampIndex 1 eq and{
  2079.             fill
  2080.         }if
  2081.     
  2082.         _spotColor{
  2083.             nsetcustomcolorend
  2084.         }if
  2085.     }ifelse
  2086. }def
  2087. end
  2088. end
  2089. defaultpacking setpacking
  2090. %%EndResource
  2091.